home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / comm / tcp / getsite.lha / getsite / Rexx / MiamiOffline.rexx next >
Encoding:
OS/2 REXX Batch file  |  1998-10-03  |  384 b   |  26 lines
  1. /*rx
  2. ** $VER: MiamiOffline.rexx 1.0 (02.10.98)
  3. **
  4. ** Written by E.Bamberg <e.bamberg@trier-online.de>
  5. **
  6. ** This script checks if Miami is launched and set onlined
  7. ** by netbench (MIAMIONLINE.REXX)
  8. ** in that kind it set MIAMI to ONLINE STATE 
  9. **
  10. */
  11.  
  12. address command WaitForPort MIAMI.1
  13. if rc = 5 then
  14.   do
  15.    exit
  16.   end
  17.  
  18. address MIAMI.1
  19. IsOnline
  20. if rc~=0 then
  21.    do
  22.      offline
  23.     end
  24.  
  25.  
  26.